home *** CD-ROM | disk | FTP | other *** search
/ Aminet 40 / Aminet 40 (2000)(Schatztruhe)[!][Dec 2000].iso / Aminet / comm / irc / KuangEleven3Gm.lha / Kuang Eleven 3 / Rexx / CTCP / ping.amirx < prev    next >
Text File  |  1998-05-09  |  375b  |  12 lines
  1. /* $VER: ping.amirx 1.0 (9.5.98) Kuang Eleven Plugin : Ping SOUND resopnse
  2. *   Requires AmIRC 1.30!
  3. */
  4. sound='Ping.WAV' /* Soundfile to play */
  5. options results
  6. parse arg ':'prefix' 'type' 'channel' :'text
  7. parse var prefix nick'!'user'@'host
  8. div='01'x
  9. parse upper var text (div) command args (div)
  10. if command~='PING' then exit
  11. 'QueueRAW PRIVMSG' nick ':'div'SOUND' sound||div
  12.